home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_12 / hat / rfsboot < prev    next >
Encoding:
Text File  |  1988-08-26  |  719 b   |  31 lines
  1.  
  2. VDU21
  3. VDU6,11,32,32,32,32,32,32,21
  4. VDU6,19,0,4,0,0,0,21
  5. VDU6,19,1,0,0,0,0,21
  6. VDU6,13,11,11,11,11,11,21
  7. VDU6:COLOUR 6:VDU21
  8. VDU6:PRINT"N o r w i c h   C o m p u t e r   S e r v i c e s":VDU21
  9. VDU6:COLOUR 7:VDU21
  10.  
  11. *SET CLI$PROMPT <10><13>Good Morning! *
  12. *IF SYS$TIME LEFT 2>11 THEN SET CLI$PROMPT <10><13>Good Afternoon! *
  13. *IF SYS$TIME LEFT 2>18 THEN SET CLI$PROMPT <10><13>Good Evening! *
  14.  
  15. *KEY0 *MOUNT 0|M*FREE|M*CAT|M
  16. *KEY1 *MOUNT 1|M*FREE|M*CAT|M
  17. *KEY2 *MOUNT 2|M*CAT|M
  18. *KEY4 *SET Alias$ScreenLoad Fastload|MQUIT|MRMLOAD RFS:FASTRM|M*BASIC|M
  19. *KEY5 *FORMAT 0 L|M
  20. *KEY8 Y|G
  21. *KEY9 *BACKUP 1 0 Q|M
  22. *KEY11 Y G*BACKUP 1 0 Q|M
  23. *KEY12 *FORMAT 0 D|M
  24.  
  25. *SET Run$Path ,ADFS:$.,RFS:$.,%.
  26. *SET Alias$> CAT
  27.  
  28. *FX255,8
  29. *ADFS
  30. *BASIC
  31.